home *** CD-ROM | disk | FTP | other *** search
/ Quick PC 62 / Quick PC 62.iso / I386 / IIS5_01.CAB / IIS_iisec.asp < prev    next >
Encoding:
Text File  |  1999-06-03  |  4.4 KB  |  174 lines
  1. <%@ LANGUAGE = VBScript %>
  2. <% Option Explicit %>
  3. <!-- #include file="directives.inc" -->
  4.  
  5. <% if Session("FONTSIZE") = "" then %>
  6.     <!--#include file="iito.inc"-->
  7. <% else %>
  8.     <!--#include file="iisec.str"-->
  9.     <!--#include file="iiaccess.str"-->
  10.  
  11. <% 
  12.  
  13. On Error Resume Next 
  14.  
  15. Dim path, currentobj
  16.  
  17. path=Session("dpath")
  18. Set currentobj=GetObject(path)
  19. %>
  20.  
  21. <!--#include file="iisetfnt.inc"-->
  22. <!--#include file="iiset.inc"-->
  23.  
  24. <HTML>
  25. <HEAD>
  26. <SCRIPT LANGUAGE="JavaScript">
  27.  
  28. var Global=top.title.Global;
  29.  
  30. <% if InStr(currentobj.KeyType, "Ftp") <> 0 then %>
  31.     Global.helpFileName="iipz_4";
  32. <% else %>
  33.     Global.helpFileName="iipy_37";
  34. <% end if %>    
  35.  
  36. <!-- used to disable save pop-up -->
  37. Global.siteProperties = true;
  38.  
  39. <!--#include file="iijsfuncs.inc"-->
  40.  
  41.     function warnWrkingSite()
  42.     {
  43.         if (top.title.nodeList[Global.selId].isWorkingServer)
  44.         {
  45.             alert("<%= L_WORKINGSERVER_TEXT %>");
  46.         }
  47.     }
  48.     
  49. </SCRIPT>
  50.  
  51.     <TITLE></TITLE>
  52. </HEAD>
  53.  
  54. <BODY BGCOLOR="<%= Session("BGCOLOR") %>" TOPMARGIN=5 TEXT="#000000" LINK="#000000" VLINK="#000000">
  55.  
  56. <TABLE WIDTH = 500 BORDER = 0>
  57. <TR>
  58. <TD>
  59.  
  60. <FORM NAME="userform">
  61. <%= sFont("","","",True) %>
  62. <B>
  63.     <%= L_DIRSEC_TEXT %>
  64. </B>
  65. <P>
  66. <% if Session("stype")="www" then %>
  67.  
  68. <TABLE CELLSPACING=0 CELLPADDING=2>
  69. <TR><TD><%= sFont("","","",True) %>
  70. <IMG SRC="images/hr.gif" WIDTH=5 HEIGHT=2 BORDER=0 ALIGN="middle">
  71. <%= L_PWAUTH_TEXT %>
  72. <IMG SRC="images/hr.gif" WIDTH=<%= L_PWAUTHHR_NUM %> HEIGHT=2 BORDER=0 ALIGN="middle">
  73. <P></FONT></TD></TR>
  74. <TR><TD>
  75. <TABLE CELLSPACING=0 CELLPADDING=2>
  76.     <TR>
  77.         <TD>  </TD>
  78.         <TD WIDTH=50 VALIGN="middle"><IMG SRC="images/handshk.gif" WIDTH=32 HEIGHT=28 BORDER=0></TD>
  79.         <TD WIDTH=340 VALIGN="top"><%= sFont("","","",True) %><%= L_AUTHMETHOD_TEXT %></FONT></TD>
  80.         <TD VALIGN="middle"><%= sFont("","","",True) %><INPUT TYPE="button" VALUE="<%= L_EDIT_TEXT %>" NAME="btnAuthenticate" onClick="warnWrkingSite();popBox('Authenticate',<%= L_IIAUTH_W %>,<%= L_IIAUTH_H %>, 'iiauth')"></TD>
  81.     </TR>
  82. </TABLE>
  83.  
  84. <% end if %>
  85.  
  86. <P>
  87. <TABLE CELLSPACING=0 CELLPADDING=2>
  88. <TR><TD><%= sFont("","","",True) %>
  89. <IMG SRC="images/hr.gif" WIDTH=5 HEIGHT=2 BORDER=0 ALIGN="middle">
  90. <%= L_ACCESS_TEXT %>
  91. <IMG SRC="images/hr.gif" WIDTH=<%= L_ACCESSHR_NUM %> HEIGHT=2 BORDER=0 ALIGN="middle">
  92. <P></FONT></TD></TR>
  93.  
  94. <TR><TD>
  95. <TABLE CELLSPACING=0 CELLPADDING=2>
  96.     <TR>
  97.         <TD>  </TD>
  98.         <TD WIDTH=50 VALIGN="middle"><IMG SRC="images/access.gif" WIDTH=32 HEIGHT=28 BORDER=0></TD>
  99.         <TD WIDTH=340 VALIGN="top"><%= sFont("","","",True) %><%= L_ENABLEANON_TEXT %></FONT></TD>
  100.         <TD VALIGN="middle"><%= sFont("","","",True) %><INPUT TYPE="button" VALUE="<%= L_EDIT_TEXT %>" NAME="btnAuthenticate" onClick="warnWrkingSite();popBox('Access',<%= L_IIACCESS_W %>,<%= L_IIACCESS_H %>, 'iiaccess')"></TD>
  101.     </TR>
  102. </TABLE>
  103. </TD></TR>
  104. </TABLE>
  105.  
  106. <% if Session("stype")="www" then %>
  107. <% if Session("vtype")="server" then %>
  108.  
  109. <P>
  110. <TABLE CELLSPACING=0 CELLPADDING=2>
  111. <TR><TD><%= sFont("","","",True) %>
  112. <IMG SRC="images/hr.gif" WIDTH=5 HEIGHT=2 BORDER=0 ALIGN="middle">
  113. <%= L_SECCOMM_TEXT %>
  114. <IMG SRC="images/hr.gif" WIDTH=<%= L_SECCOMMHR_NUM %> HEIGHT=2 BORDER=0 ALIGN="middle">
  115. <P></FONT></TD></TR>
  116. <TR><TD>
  117.  
  118. <TABLE CELLSPACING=0 CELLPADDING=2>
  119.     <TR>
  120.         <TD>  </TD>
  121.         <TD WIDTH=50 VALIGN="middle"><IMG SRC="images/key.gif" WIDTH=32 HEIGHT=28 BORDER=0></TD>
  122.         <TD WIDTH=340 VALIGN="top"><%= sFont("","","",True) %><%= L_VIEWSECOMM_TEXT %></FONT></TD>
  123.         <TD VALIGN="middle"><%= sFont("","","",True) %><INPUT TYPE="button" VALUE="<%= L_EDIT_TEXT %>" NAME="btnCommunication" onClick="warnWrkingSite();popBox('Communications',<%= L_IICOMM_W %>,<%= L_IICOMM_H %>, 'iicomm')"></TD>
  124.     </TR>
  125. </TABLE>
  126.  
  127. </TD></TR>
  128. </TABLE>
  129.  
  130. <% end if %>
  131. <% if Session("vtype")="svc" then %>
  132.  
  133. <P>
  134. <TABLE CELLSPACING=0 CELLPADDING=2>
  135. <TR><TD><%= sFont("","","",True) %>
  136. <IMG SRC="images/hr.gif" WIDTH=5 HEIGHT=2 BORDER=0 ALIGN="middle">
  137. <%= L_SECCOMM_TEXT %>
  138. <IMG SRC="images/hr.gif" WIDTH=<%= L_SECCOMMHR_NUM %> HEIGHT=2 BORDER=0 ALIGN="middle">
  139. <P></FONT></TD></TR>
  140. <TR><TD>
  141.  
  142. <TABLE CELLSPACING=0 CELLPADDING=2>
  143.     <TR><TD>
  144.         <%= sFont("","","",True) %>
  145.             <%= checkbox("AccessSSLMapCert","",true) %> <%= L_ENABLEMAPPING_TEXT  %>
  146.         </FONT>
  147.     <TR><TD>
  148.         <%= sFont("","","",True) %>    
  149.             <%= L_MAPDESC_TEXT %>
  150.         </FONT>
  151.     </TD></TR>
  152. </TABLE>
  153.  
  154. </TD></TR>
  155. </TABLE>
  156.  
  157. <% end if %>
  158. <% end if %>
  159.  
  160. </TD></TR>
  161. </TABLE>
  162.  
  163. </FORM>
  164.  
  165. </TD>
  166. </TR>
  167. </TABLE>
  168. </BODY>
  169.  
  170. </HTML>
  171.  
  172. <% end if %>
  173.  
  174.